home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_19_1987_Transactor_Publishing.d64 / ke.1 rom1 mods (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  562b  |  16 lines
  1. 1000 rem program tocreate file "ke.1" ondisk
  2. 1002 rem modified for 1st generation rom
  3. 1004 rem by j.paterson, houston, tx
  4. 1006 rem 9/4/86
  5. 1007 rem changes in lines 1030,1040,1060,1070,1550,1900,4450,4470
  6. 1008 rem line 4475 added
  7. 1030 for j=1 to 2753: read x: ch=ch+x: next
  8. 1040 if ch<>276696 then print "checksum error": end
  9. 1060 open 8,8,8,"0:ke.1,p,w"
  10. 1070 for j=1 to 2753: read x
  11. 1550 data 108,  27,   0,   0,  16, 129,  47,  10
  12. 1900 data 129,  32,   1,  10,  96, 136,  97,  48
  13. 4450 data  97, 162,   0, 129, 189,   6,  10,  98
  14. 4470 data  97, 144, 245,  96,  96,  97, 169,   1
  15. 4475 data  97, 145, 243,  96,  96, 112,  75,  69
  16.